home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -serious- / comms / other / zelador / sources / zeladorgui.c < prev    next >
Encoding:
C/C++ Source or Header  |  1999-09-06  |  32.4 KB  |  1,351 lines
  1. #ifndef MAKE_ID
  2. #define MAKE_ID(a,b,c,d) ((ULONG) (a)<<24 | (ULONG) (b)<<16 | (ULONG) (c)<<8 | (ULONG) (d))
  3. #endif
  4.  
  5. /* Libraries */
  6. #include <libraries/mui.h>
  7. #include <libraries/gadtools.h> /* for Barlabel in MenuItem */
  8. #include <exec/memory.h>
  9.  
  10. /* Prototypes */
  11. #include <proto/muimaster.h>
  12. #include <proto/exec.h>
  13. #ifdef __GNUC__
  14. #include <proto/alib.h>
  15. #else
  16. #include <clib/alib_protos.h>
  17. #endif /* __GNUC__ */
  18.  
  19. #include "ZeladorGUI.h"
  20. #include "ZeladorFrases.h"
  21.  
  22. struct ObjApp * CreateApp(void)
  23. {
  24.     struct ObjApp * ObjectApp;
  25.  
  26.     APTR    MNlabel1Principal, MNlabel1BarLabel0, MNlabel1BarLabel1, MNPrincipalProcess;
  27.     APTR    GROUP_ROOT_0, GR_grp_0, GR_grp_17, Space_11, IM_label_1, Space_12;
  28.     APTR    GR_grp_3, obj_aux0, obj_aux1, GR_grp_2, GROUP_ROOT_1, GR_grp_15, GR_grp_9CCCCCC;
  29.     APTR    LBL_Active2, Space_0, Space_15, LA_label_11CCCCCC, Space_16, LA_label_12CCCCCC;
  30.     APTR    Space_17, LA_label_13CCCCCC, Space_18, GR_grp_27, LA_label_16, Space_31;
  31.     APTR    LA_label_24, GR_grp_28, LA_label_23, Space_32, LA_label_25, LBL_Active;
  32.     APTR    Space_10, LA_label_10CCCCCCCCCC, GR_grp_9CCCCCCCC, Space_6, Space_7;
  33.     APTR    LBL_LimitConnBy, LA_label_15, Space_2, Space_3, LBL_EventBeginsAt;
  34.     APTR    Space_4, Space_5, LBL_TryUntil, Space_8, Space_9, GR_grp_24, GR_grp_18;
  35.     APTR    GR_grp_20, LA_label_17, LA_label_18, LA_label_19, LA_label_26, GR_grp_25;
  36.     APTR    obj_aux2, obj_aux3, obj_aux4, obj_aux5, GR_grp_23, LA_label_20, LA_label_21;
  37.     APTR    LA_label_22, GR_grp_26, GR_grp_23CC, LA_label_20CC, LA_label_21CC;
  38.     APTR    LA_label_22CC, GR_grp_16;
  39.  
  40.     if (!(ObjectApp = AllocVec(sizeof(struct ObjApp),MEMF_PUBLIC|MEMF_CLEAR)))
  41.         return(NULL);
  42.  
  43.     ObjectApp->STR_TXT_DataHoras = NULL;
  44.     ObjectApp->STR_TXT_Status = NULL;
  45.  
  46.     ObjectApp->STR_GR_grp_13CCCC[0] = FraEventos;
  47.     ObjectApp->STR_GR_grp_13CCCC[1] = FraHoras;
  48.     ObjectApp->STR_GR_grp_13CCCC[2] = FraEFR;
  49.     ObjectApp->STR_GR_grp_13CCCC[3] = FraRR;
  50.     ObjectApp->STR_GR_grp_13CCCC[4] = NULL;
  51.     ObjectApp->CYC_DuracTempoContent[0] = FraDuracaoMaxima;
  52.     ObjectApp->CYC_DuracTempoContent[1] = FraHoraMaxima;
  53.     ObjectApp->CYC_DuracTempoContent[2] = NULL;
  54.  
  55.     Space_11 = HVSpace;
  56.  
  57.     IM_label_1 = ImageObject,
  58.         MUIA_Image_Spec, "5:Zelador.iff",
  59.         MUIA_Image_FreeVert, TRUE,
  60.         MUIA_Image_FreeHoriz, TRUE,
  61.         MUIA_FixHeight, 22,
  62.         MUIA_FixWidth, 338,
  63.     End;
  64.  
  65.     Space_12 = HVSpace;
  66.  
  67.     GR_grp_17 = GroupObject,
  68.         MUIA_HelpNode, "GR_grp_17",
  69.         MUIA_Group_Horiz, TRUE,
  70.         Child, Space_11,
  71.         Child, IM_label_1,
  72.         Child, Space_12,
  73.     End;
  74.  
  75.     ObjectApp->TXT_DataHoras = TextObject,
  76.         MUIA_Weight, 24,
  77.         MUIA_Background, MUII_TextBack,
  78.         MUIA_Frame, MUIV_Frame_Text,
  79.         MUIA_Text_Contents, ObjectApp->STR_TXT_DataHoras,
  80.         MUIA_Text_SetMin, TRUE,
  81.     End;
  82.  
  83.     ObjectApp->CHK_EventosAtivos = CheckMark(FALSE);
  84.  
  85.     obj_aux1 = Label2(FraEventosAtivos);
  86.  
  87.     obj_aux0 = GroupObject,
  88.         MUIA_Group_Columns, 2,
  89.         Child, obj_aux1,
  90.         Child, ObjectApp->CHK_EventosAtivos,
  91.     End;
  92.  
  93.     GR_grp_3 = GroupObject,
  94.         MUIA_HelpNode, "GR_grp_3",
  95.         MUIA_Group_Horiz, TRUE,
  96.         MUIA_Group_SameWidth, TRUE,
  97.         Child, ObjectApp->TXT_DataHoras,
  98.         Child, obj_aux0,
  99.     End;
  100.  
  101.     ObjectApp->TXT_Status = TextObject,
  102.         MUIA_Background, MUII_TextBack,
  103.         MUIA_Frame, MUIV_Frame_Text,
  104.         MUIA_Text_Contents, ObjectApp->STR_TXT_Status,
  105.         MUIA_Text_SetMin, TRUE,
  106.     End;
  107.  
  108.     ObjectApp->BT_FazerEvento = SimpleButton(FraFazerEvento);
  109.  
  110.     ObjectApp->BT_Config = SimpleButton(FraConfig);
  111.  
  112.     GR_grp_2 = GroupObject,
  113.         MUIA_HelpNode, "GR_grp_2",
  114.         MUIA_Group_Horiz, TRUE,
  115.         MUIA_Group_SameWidth, TRUE,
  116.         Child, ObjectApp->BT_FazerEvento,
  117.         Child, ObjectApp->BT_Config,
  118.     End;
  119.  
  120.     GR_grp_0 = GroupObject,
  121.         MUIA_HelpNode, "GR_grp_0",
  122.         Child, GR_grp_17,
  123.         Child, GR_grp_3,
  124.         Child, ObjectApp->TXT_Status,
  125.         Child, GR_grp_2,
  126.     End;
  127.  
  128.     GROUP_ROOT_0 = GroupObject,
  129.         Child, GR_grp_0,
  130.     End;
  131.  
  132.     ObjectApp->MN_Config = MenuitemObject,
  133.         MUIA_Menuitem_Title, FraConfigMenu,
  134.         MUIA_Menuitem_Shortcut, FraHKConfig,
  135.     End;
  136.  
  137.     MNlabel1BarLabel0 = MUI_MakeObject(MUIO_Menuitem, NM_BARLABEL, 0, 0, 0);
  138.  
  139.     ObjectApp->MN_Sobre = MenuitemObject,
  140.         MUIA_Menuitem_Title, FraSobre,
  141.         MUIA_Menuitem_Shortcut, FraHKSobre,
  142.     End;
  143.  
  144.     MNlabel1BarLabel1 = MUI_MakeObject(MUIO_Menuitem, NM_BARLABEL, 0, 0, 0);
  145.  
  146.     ObjectApp->MN_Sair = MenuitemObject,
  147.         MUIA_Menuitem_Title, FraSair,
  148.         MUIA_Menuitem_Shortcut, FraHKSair,
  149.     End;
  150.  
  151.     MNlabel1Principal = MenuitemObject,
  152.         MUIA_Menuitem_Title, FraMenuTit,
  153.         MUIA_Family_Child, ObjectApp->MN_Config,
  154.         MUIA_Family_Child, MNlabel1BarLabel0,
  155.         MUIA_Family_Child, ObjectApp->MN_Sobre,
  156.         MUIA_Family_Child, MNlabel1BarLabel1,
  157.         MUIA_Family_Child, ObjectApp->MN_Sair,
  158.     End;
  159.  
  160.     ObjectApp->MN_EFR = MenuitemObject,
  161.         MUIA_Menuitem_Title, FraMenuEFR,
  162.         MUIA_Menuitem_Shortcut, FraHKMenuEFR,
  163.     End;
  164.  
  165.     ObjectApp->MN_RR = MenuitemObject,
  166.         MUIA_Menuitem_Title, FraMenuRR,
  167.         MUIA_Menuitem_Shortcut, FraHKMenuRR,
  168.     End;
  169.  
  170.     MNPrincipalProcess = MenuitemObject,
  171.         MUIA_Menuitem_Title, FraMenuTit2,
  172.         MUIA_Family_Child, ObjectApp->MN_EFR,
  173.         MUIA_Family_Child, ObjectApp->MN_RR,
  174.     End;
  175.  
  176.     ObjectApp->MN_Principal = MenustripObject,
  177.         MUIA_Family_Child, MNlabel1Principal,
  178.         MUIA_Family_Child, MNPrincipalProcess,
  179.     End;
  180.  
  181.     ObjectApp->Janela_Principal = WindowObject,
  182.         MUIA_Window_Title, FraTitJanela,
  183.         MUIA_Window_Menustrip, ObjectApp->MN_Principal,
  184.         MUIA_Window_ID, MAKE_ID('0', 'W', 'I', 'N'),
  185.         WindowContents, GROUP_ROOT_0,
  186.     End;
  187.  
  188.     LBL_Active2 = Label(FraAtivo);
  189.  
  190.     Space_0 = HVSpace;
  191.  
  192.     Space_15 = HVSpace;
  193.  
  194.     ObjectApp->CHK_AutoMiami = KeyCheckMark(FALSE, 'a');
  195.  
  196.     LA_label_11CCCCCC = Label(FraAutoMiami);
  197.  
  198.     Space_16 = HVSpace;
  199.  
  200.     ObjectApp->CHK_ReceberYAM = KeyCheckMark(FALSE, 'r');
  201.  
  202.     LA_label_12CCCCCC = Label(FraRecebYAM);
  203.  
  204.     Space_17 = HVSpace;
  205.  
  206.     ObjectApp->CHK_EnviarYAM = KeyCheckMark(FALSE, 'e');
  207.  
  208.     LA_label_13CCCCCC = Label(FraEnvYAM);
  209.  
  210.     Space_18 = HVSpace;
  211.  
  212.     ObjectApp->CHK_FileRequest = KeyCheckMark(FALSE, 'f');
  213.  
  214.     LA_label_16 = Label(FraProcEFR);
  215.  
  216.     Space_31 = HVSpace;
  217.  
  218.     LA_label_24 = Label(FraRodarQdoConectado);
  219.  
  220.     GR_grp_27 = GroupObject,
  221.         MUIA_HelpNode, "GR_grp_27",
  222.         MUIA_Group_Horiz, TRUE,
  223.         Child, LA_label_16,
  224.         Child, Space_31,
  225.         Child, LA_label_24,
  226.     End;
  227.  
  228.     ObjectApp->CHK_EFRScanWhileConnected = KeyCheckMark(FALSE, 'i');
  229.  
  230.     ObjectApp->CHK_HabilitaRobotReply = KeyCheckMark(FALSE, 'p');
  231.  
  232.     LA_label_23 = Label(FraAutoProcRR);
  233.  
  234.     Space_32 = HVSpace;
  235.  
  236.     LA_label_25 = Label(FraRodarQdoConectado2);
  237.  
  238.     GR_grp_28 = GroupObject,
  239.         MUIA_HelpNode, "GR_grp_28",
  240.         MUIA_Group_Horiz, TRUE,
  241.         Child, LA_label_23,
  242.         Child, Space_32,
  243.         Child, LA_label_25,
  244.     End;
  245.  
  246.     ObjectApp->CHK_RRScanWhileConnected = KeyCheckMark(FALSE, 'n');
  247.  
  248.     LBL_Active = Label(FraAtivo2);
  249.  
  250.     Space_10 = HVSpace;
  251.  
  252.     LA_label_10CCCCCCCCCC = Label(FraEsperar);
  253.  
  254.     ObjectApp->CHK_Ativo1 = CheckMark(FALSE);
  255.  
  256.     ObjectApp->STR_Path1 = StringObject,
  257.         MUIA_Frame, MUIV_Frame_String,
  258.         MUIA_HelpNode, "STR_Path1",
  259.         MUIA_String_MaxLen, 128,
  260.     End;
  261.  
  262.     ObjectApp->CHK_Espera1 = CheckMark(FALSE);
  263.  
  264.     ObjectApp->CHK_Ativo2 = CheckMark(FALSE);
  265.  
  266.     ObjectApp->STR_Path2 = StringObject,
  267.         MUIA_Frame, MUIV_Frame_String,
  268.         MUIA_HelpNode, "STR_Path2",
  269.         MUIA_String_MaxLen, 128,
  270.     End;
  271.  
  272.     ObjectApp->CHK_Espera2 = CheckMark(FALSE);
  273.  
  274.     ObjectApp->CHK_Ativo3 = CheckMark(FALSE);
  275.  
  276.     ObjectApp->STR_Path3 = StringObject,
  277.         MUIA_Frame, MUIV_Frame_String,
  278.         MUIA_HelpNode, "STR_Path3",
  279.         MUIA_String_MaxLen, 128,
  280.     End;
  281.  
  282.     ObjectApp->CHK_Espera3 = CheckMark(FALSE);
  283.  
  284.     GR_grp_9CCCCCC = GroupObject,
  285.         MUIA_HelpNode, "GR_grp_9CCCCCC",
  286.         MUIA_Group_Columns, 3,
  287.         MUIA_Group_SameHeight, TRUE,
  288.         Child, LBL_Active2,
  289.         Child, Space_0,
  290.         Child, Space_15,
  291.         Child, ObjectApp->CHK_AutoMiami,
  292.         Child, LA_label_11CCCCCC,
  293.         Child, Space_16,
  294.         Child, ObjectApp->CHK_ReceberYAM,
  295.         Child, LA_label_12CCCCCC,
  296.         Child, Space_17,
  297.         Child, ObjectApp->CHK_EnviarYAM,
  298.         Child, LA_label_13CCCCCC,
  299.         Child, Space_18,
  300.         Child, ObjectApp->CHK_FileRequest,
  301.         Child, GR_grp_27,
  302.         Child, ObjectApp->CHK_EFRScanWhileConnected,
  303.         Child, ObjectApp->CHK_HabilitaRobotReply,
  304.         Child, GR_grp_28,
  305.         Child, ObjectApp->CHK_RRScanWhileConnected,
  306.         Child, LBL_Active,
  307.         Child, Space_10,
  308.         Child, LA_label_10CCCCCCCCCC,
  309.         Child, ObjectApp->CHK_Ativo1,
  310.         Child, ObjectApp->STR_Path1,
  311.         Child, ObjectApp->CHK_Espera1,
  312.         Child, ObjectApp->CHK_Ativo2,
  313.         Child, ObjectApp->STR_Path2,
  314.         Child, ObjectApp->CHK_Espera2,
  315.         Child, ObjectApp->CHK_Ativo3,
  316.         Child, ObjectApp->STR_Path3,
  317.         Child, ObjectApp->CHK_Espera3,
  318.     End;
  319.  
  320.     Space_6 = HVSpace;
  321.  
  322.     Space_7 = HVSpace;
  323.  
  324.     LBL_LimitConnBy = Label(FraLimitarPor);
  325.  
  326.     LA_label_15 = Label(FraHHMM24h);
  327.  
  328.     ObjectApp->CYC_DuracTempo = CycleObject,
  329.         MUIA_HelpNode, "CYC_DuracTempo",
  330.         MUIA_ControlChar, 'l',
  331.         MUIA_Cycle_Entries, ObjectApp->CYC_DuracTempoContent,
  332.     End;
  333.  
  334.     ObjectApp->STR_LimiteHoras = StringObject,
  335.         MUIA_Frame, MUIV_Frame_String,
  336.         MUIA_ControlChar, 'm',
  337.         MUIA_HelpNode, "STR_LimiteHoras",
  338.         MUIA_String_Contents, "0000",
  339.         MUIA_String_Accept, "0123456789",
  340.         MUIA_String_MaxLen, 5,
  341.     End;
  342.  
  343.     Space_2 = HVSpace;
  344.  
  345.     Space_3 = HVSpace;
  346.  
  347.     LBL_EventBeginsAt = Label(FraEventoComecaAs);
  348.  
  349.     ObjectApp->STR_InicioEvento = StringObject,
  350.         MUIA_Frame, MUIV_Frame_String,
  351.         MUIA_ControlChar, 'i',
  352.         MUIA_HelpNode, "STR_InicioEvento",
  353.         MUIA_String_Contents, "0000",
  354.         MUIA_String_Accept, "0123456789",
  355.         MUIA_String_MaxLen, 5,
  356.     End;
  357.  
  358.     Space_4 = HVSpace;
  359.  
  360.     Space_5 = HVSpace;
  361.  
  362.     LBL_TryUntil = Label(FraTentarAte);
  363.  
  364.     ObjectApp->STR_TentarAte = StringObject,
  365.         MUIA_Frame, MUIV_Frame_String,
  366.         MUIA_ControlChar, 't',
  367.         MUIA_HelpNode, "STR_TentarAte",
  368.         MUIA_String_Contents, "0000",
  369.         MUIA_String_Accept, "0123456789",
  370.         MUIA_String_MaxLen, 5,
  371.     End;
  372.  
  373.     Space_8 = HVSpace;
  374.  
  375.     Space_9 = HVSpace;
  376.  
  377.     GR_grp_9CCCCCCCC = GroupObject,
  378.         MUIA_HelpNode, "GR_grp_9CCCCCCCC",
  379.         MUIA_Group_Columns, 2,
  380.         Child, Space_6,
  381.         Child, Space_7,
  382.         Child, LBL_LimitConnBy,
  383.         Child, LA_label_15,
  384.         Child, ObjectApp->CYC_DuracTempo,
  385.         Child, ObjectApp->STR_LimiteHoras,
  386.         Child, Space_2,
  387.         Child, Space_3,
  388.         Child, LBL_EventBeginsAt,
  389.         Child, ObjectApp->STR_InicioEvento,
  390.         Child, Space_4,
  391.         Child, Space_5,
  392.         Child, LBL_TryUntil,
  393.         Child, ObjectApp->STR_TentarAte,
  394.         Child, Space_8,
  395.         Child, Space_9,
  396.     End;
  397.  
  398.     LA_label_17 = Label(FraTopicoInterceptar);
  399.  
  400.     ObjectApp->STR_AssuntoIntercepta = StringObject,
  401.         MUIA_Frame, MUIV_Frame_String,
  402.         MUIA_ControlChar, 'i',
  403.         MUIA_HelpNode, "STR_AssuntoIntercepta",
  404.     End;
  405.  
  406.     LA_label_18 = Label(FraTxtApresentacao);
  407.  
  408.     ObjectApp->STR_POP_TxtApresentacao = String("", 80);
  409.  
  410.     ObjectApp->POP_TxtApresentacao = PopButton(MUII_PopFile);
  411.  
  412.     ObjectApp->POP_TxtApresentacao = PopaslObject,
  413.         MUIA_HelpNode, "POP_TxtApresentacao",
  414.         MUIA_Popasl_Type, 0,
  415.         MUIA_Popstring_String, ObjectApp->STR_POP_TxtApresentacao,
  416.         MUIA_Popstring_Button, ObjectApp->POP_TxtApresentacao,
  417.     End;
  418.  
  419.     LA_label_19 = Label(FraTxtAEnviar);
  420.  
  421.     ObjectApp->STR_POP_EnviandoArq = String("", 80);
  422.  
  423.     ObjectApp->POP_EnviandoArq = PopButton(MUII_PopFile);
  424.  
  425.     ObjectApp->POP_EnviandoArq = PopaslObject,
  426.         MUIA_HelpNode, "POP_EnviandoArq",
  427.         MUIA_Popasl_Type, 0,
  428.         MUIA_Popstring_String, ObjectApp->STR_POP_EnviandoArq,
  429.         MUIA_Popstring_Button, ObjectApp->POP_EnviandoArq,
  430.     End;
  431.  
  432.     LA_label_26 = Label(FraReqMaxEvento);
  433.  
  434.     ObjectApp->STR_MaxPedidoKbEvento = StringObject,
  435.         MUIA_Weight, 2,
  436.         MUIA_Frame, MUIV_Frame_String,
  437.         MUIA_ControlChar, 'm',
  438.         MUIA_HelpNode, "STR_MaxPedidoKbEvento",
  439.         MUIA_String_Accept, "0123456789",
  440.         MUIA_String_MaxLen, 9,
  441.     End;
  442.  
  443.     ObjectApp->STR_RecusaAPartirKB = StringObject,
  444.         MUIA_Frame, MUIV_Frame_String,
  445.         MUIA_ControlChar, 'f',
  446.         MUIA_HelpNode, "STR_RecusaAPartirKB",
  447.         MUIA_String_Accept, "0123456789",
  448.         MUIA_String_MaxLen, 9,
  449.     End;
  450.  
  451.     obj_aux3 = KeyLabel2(FraComRecusarA, 'f');
  452.  
  453.     obj_aux2 = GroupObject,
  454.         MUIA_Group_Columns, 2,
  455.         MUIA_Weight, 4,
  456.         Child, obj_aux3,
  457.         Child, ObjectApp->STR_RecusaAPartirKB,
  458.     End;
  459.  
  460.     ObjectApp->STR_MaxDaysValidID = StringObject,
  461.         MUIA_Frame, MUIV_Frame_String,
  462.         MUIA_ControlChar, 'd',
  463.         MUIA_HelpNode, "STR_MaxDaysValidID",
  464.         MUIA_String_Accept, "0123456789",
  465.         MUIA_String_MaxLen, 4,
  466.     End;
  467.  
  468.     obj_aux5 = KeyLabel2(FraMaxDiasProc, 'd');
  469.  
  470.     obj_aux4 = GroupObject,
  471.         MUIA_Group_Columns, 2,
  472.         MUIA_Weight, 2,
  473.         Child, obj_aux5,
  474.         Child, ObjectApp->STR_MaxDaysValidID,
  475.     End;
  476.  
  477.     GR_grp_25 = GroupObject,
  478.         MUIA_HelpNode, "GR_grp_25",
  479.         MUIA_Group_Horiz, TRUE,
  480.         Child, ObjectApp->STR_MaxPedidoKbEvento,
  481.         Child, obj_aux2,
  482.         Child, obj_aux4,
  483.     End;
  484.  
  485.     GR_grp_20 = GroupObject,
  486.         MUIA_HelpNode, "GR_grp_20",
  487.         MUIA_Group_Columns, 2,
  488.         Child, LA_label_17,
  489.         Child, ObjectApp->STR_AssuntoIntercepta,
  490.         Child, LA_label_18,
  491.         Child, ObjectApp->POP_TxtApresentacao,
  492.         Child, LA_label_19,
  493.         Child, ObjectApp->POP_EnviandoArq,
  494.         Child, LA_label_26,
  495.         Child, GR_grp_25,
  496.     End;
  497.  
  498.     GR_grp_18 = GroupObject,
  499.         MUIA_HelpNode, "GR_grp_18",
  500.         Child, GR_grp_20,
  501.     End;
  502.  
  503.     LA_label_20 = Label(FraAtivadoTab);
  504.  
  505.     LA_label_21 = Label(FraDescricaoArq);
  506.  
  507.     LA_label_22 = Label(FraArqPathEFR);
  508.  
  509.     ObjectApp->CHK_Req0 = CheckMark(FALSE);
  510.  
  511.     ObjectApp->STR_Req0 = StringObject,
  512.         MUIA_Frame, MUIV_Frame_String,
  513.         MUIA_HelpNode, "STR_Req0",
  514.         MUIA_String_Reject, "\\\"*?#/'",
  515.     End;
  516.  
  517.     ObjectApp->STR_POP_Req0 = String("", 80);
  518.  
  519.     ObjectApp->POP_Req0 = PopButton(MUII_PopFile);
  520.  
  521.     ObjectApp->POP_Req0 = PopaslObject,
  522.         MUIA_HelpNode, "POP_Req0",
  523.         MUIA_Popasl_Type, 0,
  524.         MUIA_Popstring_String, ObjectApp->STR_POP_Req0,
  525.         MUIA_Popstring_Button, ObjectApp->POP_Req0,
  526.     End;
  527.  
  528.     ObjectApp->CHK_Req1 = CheckMark(FALSE);
  529.  
  530.     ObjectApp->STR_Req1 = StringObject,
  531.         MUIA_Frame, MUIV_Frame_String,
  532.         MUIA_HelpNode, "STR_Req1",
  533.         MUIA_String_Reject, "\\\"*?#/'",
  534.     End;
  535.  
  536.     ObjectApp->STR_POP_Req1 = String("", 80);
  537.  
  538.     ObjectApp->POP_Req1 = PopButton(MUII_PopFile);
  539.  
  540.     ObjectApp->POP_Req1 = PopaslObject,
  541.         MUIA_HelpNode, "POP_Req1",
  542.         MUIA_Popasl_Type, 0,
  543.         MUIA_Popstring_String, ObjectApp->STR_POP_Req1,
  544.         MUIA_Popstring_Button, ObjectApp->POP_Req1,
  545.     End;
  546.  
  547.     ObjectApp->CHK_Req2 = CheckMark(FALSE);
  548.  
  549.     ObjectApp->STR_Req2 = StringObject,
  550.         MUIA_Frame, MUIV_Frame_String,
  551.         MUIA_HelpNode, "STR_Req2",
  552.         MUIA_String_Reject, "\\\"*?#/'",
  553.     End;
  554.  
  555.     ObjectApp->STR_POP_Req2 = String("", 80);
  556.  
  557.     ObjectApp->POP_Req2 = PopButton(MUII_PopFile);
  558.  
  559.     ObjectApp->POP_Req2 = PopaslObject,
  560.         MUIA_HelpNode, "POP_Req2",
  561.         MUIA_Popasl_Type, 0,
  562.         MUIA_Popstring_String, ObjectApp->STR_POP_Req2,
  563.         MUIA_Popstring_Button, ObjectApp->POP_Req2,
  564.     End;
  565.  
  566.     ObjectApp->CHK_Req3 = CheckMark(FALSE);
  567.  
  568.     ObjectApp->STR_Req3 = StringObject,
  569.         MUIA_Frame, MUIV_Frame_String,
  570.         MUIA_HelpNode, "STR_Req3",
  571.         MUIA_String_Reject, "\\\"*?#/'",
  572.     End;
  573.  
  574.     ObjectApp->STR_POP_Req3 = String("", 80);
  575.  
  576.     ObjectApp->POP_Req3 = PopButton(MUII_PopFile);
  577.  
  578.     ObjectApp->POP_Req3 = PopaslObject,
  579.         MUIA_HelpNode, "POP_Req3",
  580.         MUIA_Popasl_Type, 0,
  581.         MUIA_Popstring_String, ObjectApp->STR_POP_Req3,
  582.         MUIA_Popstring_Button, ObjectApp->POP_Req3,
  583.     End;
  584.  
  585.     ObjectApp->CHK_Req4 = CheckMark(FALSE);
  586.  
  587.     ObjectApp->STR_Req4 = StringObject,
  588.         MUIA_Frame, MUIV_Frame_String,
  589.         MUIA_HelpNode, "STR_Req4",
  590.         MUIA_String_Reject, "\\\"*?#/'",
  591.     End;
  592.  
  593.     ObjectApp->STR_POP_Req4 = String("", 80);
  594.  
  595.     ObjectApp->POP_Req4 = PopButton(MUII_PopFile);
  596.  
  597.     ObjectApp->POP_Req4 = PopaslObject,
  598.         MUIA_HelpNode, "POP_Req4",
  599.         MUIA_Popasl_Type, 0,
  600.         MUIA_Popstring_String, ObjectApp->STR_POP_Req4,
  601.         MUIA_Popstring_Button, ObjectApp->POP_Req4,
  602.     End;
  603.  
  604.     ObjectApp->CHK_Req5 = CheckMark(FALSE);
  605.  
  606.     ObjectApp->STR_Req5 = StringObject,
  607.         MUIA_Frame, MUIV_Frame_String,
  608.         MUIA_HelpNode, "STR_Req5",
  609.         MUIA_String_Reject, "\\\"*?#/'",
  610.     End;
  611.  
  612.     ObjectApp->STR_POP_Req5 = String("", 80);
  613.  
  614.     ObjectApp->POP_Req5 = PopButton(MUII_PopFile);
  615.  
  616.     ObjectApp->POP_Req5 = PopaslObject,
  617.         MUIA_HelpNode, "POP_Req5",
  618.         MUIA_Popasl_Type, 0,
  619.         MUIA_Popstring_String, ObjectApp->STR_POP_Req5,
  620.         MUIA_Popstring_Button, ObjectApp->POP_Req5,
  621.     End;
  622.  
  623.     ObjectApp->CHK_Req6 = CheckMark(FALSE);
  624.  
  625.     ObjectApp->STR_Req6 = StringObject,
  626.         MUIA_Frame, MUIV_Frame_String,
  627.         MUIA_HelpNode, "STR_Req6",
  628.         MUIA_String_Reject, "\\\"*?#/'",
  629.     End;
  630.  
  631.     ObjectApp->STR_POP_Req6 = String("", 80);
  632.  
  633.     ObjectApp->POP_Req6 = PopButton(MUII_PopFile);
  634.  
  635.     ObjectApp->POP_Req6 = PopaslObject,
  636.         MUIA_HelpNode, "POP_Req6",
  637.         MUIA_Popasl_Type, 0,
  638.         MUIA_Popstring_String, ObjectApp->STR_POP_Req6,
  639.         MUIA_Popstring_Button, ObjectApp->POP_Req6,
  640.     End;
  641.  
  642.     ObjectApp->CHK_Req7 = CheckMark(FALSE);
  643.  
  644.     ObjectApp->STR_Req7 = StringObject,
  645.         MUIA_Frame, MUIV_Frame_String,
  646.         MUIA_HelpNode, "STR_Req7",
  647.         MUIA_String_Reject, "\\\"*?#/'",
  648.     End;
  649.  
  650.     ObjectApp->STR_POP_Req7 = String("", 80);
  651.  
  652.     ObjectApp->POP_Req7 = PopButton(MUII_PopFile);
  653.  
  654.     ObjectApp->POP_Req7 = PopaslObject,
  655.         MUIA_HelpNode, "POP_Req7",
  656.         MUIA_Popasl_Type, 0,
  657.         MUIA_Popstring_String, ObjectApp->STR_POP_Req7,
  658.         MUIA_Popstring_Button, ObjectApp->POP_Req7,
  659.     End;
  660.  
  661.     ObjectApp->CHK_Req8 = CheckMark(FALSE);
  662.  
  663.     ObjectApp->STR_Req8 = StringObject,
  664.         MUIA_Frame, MUIV_Frame_String,
  665.         MUIA_HelpNode, "STR_Req8",
  666.         MUIA_String_Reject, "\\\"*?#/'",
  667.     End;
  668.  
  669.     ObjectApp->STR_POP_Req8 = String("", 80);
  670.  
  671.     ObjectApp->POP_Req8 = PopButton(MUII_PopFile);
  672.  
  673.     ObjectApp->POP_Req8 = PopaslObject,
  674.         MUIA_HelpNode, "POP_Req8",
  675.         MUIA_Popasl_Type, 0,
  676.         MUIA_Popstring_String, ObjectApp->STR_POP_Req8,
  677.         MUIA_Popstring_Button, ObjectApp->POP_Req8,
  678.     End;
  679.  
  680.     ObjectApp->CHK_Req9 = CheckMark(FALSE);
  681.  
  682.     ObjectApp->STR_Req9 = StringObject,
  683.         MUIA_Frame, MUIV_Frame_String,
  684.         MUIA_HelpNode, "STR_Req9",
  685.         MUIA_String_Reject, "\\\"*?#/'",
  686.     End;
  687.  
  688.     ObjectApp->STR_POP_Req9 = String("", 80);
  689.  
  690.     ObjectApp->POP_Req9 = PopButton(MUII_PopFile);
  691.  
  692.     ObjectApp->POP_Req9 = PopaslObject,
  693.         MUIA_HelpNode, "POP_Req9",
  694.         MUIA_Popasl_Type, 0,
  695.         MUIA_Popstring_String, ObjectApp->STR_POP_Req9,
  696.         MUIA_Popstring_Button, ObjectApp->POP_Req9,
  697.     End;
  698.  
  699.     GR_grp_23 = VirtgroupObject,
  700.         VirtualFrame,
  701.         MUIA_HelpNode, "GR_grp_23",
  702.         MUIA_Background, MUII_FILL,
  703.         MUIA_Frame, MUIV_Frame_Text,
  704.         MUIA_Group_Columns, 3,
  705.         Child, LA_label_20,
  706.         Child, LA_label_21,
  707.         Child, LA_label_22,
  708.         Child, ObjectApp->CHK_Req0,
  709.         Child, ObjectApp->STR_Req0,
  710.         Child, ObjectApp->POP_Req0,
  711.         Child, ObjectApp->CHK_Req1,
  712.         Child, ObjectApp->STR_Req1,
  713.         Child, ObjectApp->POP_Req1,
  714.         Child, ObjectApp->CHK_Req2,
  715.         Child, ObjectApp->STR_Req2,
  716.         Child, ObjectApp->POP_Req2,
  717.         Child, ObjectApp->CHK_Req3,
  718.         Child, ObjectApp->STR_Req3,
  719.         Child, ObjectApp->POP_Req3,
  720.         Child, ObjectApp->CHK_Req4,
  721.         Child, ObjectApp->STR_Req4,
  722.         Child, ObjectApp->POP_Req4,
  723.         Child, ObjectApp->CHK_Req5,
  724.         Child, ObjectApp->STR_Req5,
  725.         Child, ObjectApp->POP_Req5,
  726.         Child, ObjectApp->CHK_Req6,
  727.         Child, ObjectApp->STR_Req6,
  728.         Child, ObjectApp->POP_Req6,
  729.         Child, ObjectApp->CHK_Req7,
  730.         Child, ObjectApp->STR_Req7,
  731.         Child, ObjectApp->POP_Req7,
  732.         Child, ObjectApp->CHK_Req8,
  733.         Child, ObjectApp->STR_Req8,
  734.         Child, ObjectApp->POP_Req8,
  735.         Child, ObjectApp->CHK_Req9,
  736.         Child, ObjectApp->STR_Req9,
  737.         Child, ObjectApp->POP_Req9,
  738.     End;
  739.  
  740.     GR_grp_23 = ScrollgroupObject,
  741.         MUIA_Scrollgroup_Contents, GR_grp_23,
  742.         MUIA_Scrollgroup_FreeHoriz, FALSE,
  743.     End;
  744.  
  745.     GR_grp_24 = GroupObject,
  746.         MUIA_HelpNode, "GR_grp_24",
  747.         Child, GR_grp_18,
  748.         Child, GR_grp_23,
  749.     End;
  750.  
  751.     LA_label_20CC = Label(FraAtivadoTab2);
  752.  
  753.     LA_label_21CC = Label(FraTopIntercepRR);
  754.  
  755.     LA_label_22CC = Label(FraArqTxtEnviar);
  756.  
  757.     ObjectApp->CHK_RR0 = CheckMark(FALSE);
  758.  
  759.     ObjectApp->STR_RR0 = StringObject,
  760.         MUIA_Frame, MUIV_Frame_String,
  761.         MUIA_HelpNode, "STR_RR0",
  762.         MUIA_String_Reject, "\\\"*?#/'",
  763.     End;
  764.  
  765.     ObjectApp->STR_POP_RR0 = String("", 80);
  766.  
  767.     ObjectApp->POP_RR0 = PopButton(MUII_PopFile);
  768.  
  769.     ObjectApp->POP_RR0 = PopaslObject,
  770.         MUIA_HelpNode, "POP_RR0",
  771.         MUIA_Popasl_Type, 0,
  772.         MUIA_Popstring_String, ObjectApp->STR_POP_RR0,
  773.         MUIA_Popstring_Button, ObjectApp->POP_RR0,
  774.     End;
  775.  
  776.     ObjectApp->CHK_RR1 = CheckMark(FALSE);
  777.  
  778.     ObjectApp->STR_RR1 = StringObject,
  779.         MUIA_Frame, MUIV_Frame_String,
  780.         MUIA_HelpNode, "STR_RR1",
  781.         MUIA_String_Reject, "\\\"*?#/'",
  782.     End;
  783.  
  784.     ObjectApp->STR_POP_RR1 = String("", 80);
  785.  
  786.     ObjectApp->POP_RR1 = PopButton(MUII_PopFile);
  787.  
  788.     ObjectApp->POP_RR1 = PopaslObject,
  789.         MUIA_HelpNode, "POP_RR1",
  790.         MUIA_Popasl_Type, 0,
  791.         MUIA_Popstring_String, ObjectApp->STR_POP_RR1,
  792.         MUIA_Popstring_Button, ObjectApp->POP_RR1,
  793.     End;
  794.  
  795.     ObjectApp->CHK_RR2 = CheckMark(FALSE);
  796.  
  797.     ObjectApp->STR_RR2 = StringObject,
  798.         MUIA_Frame, MUIV_Frame_String,
  799.         MUIA_HelpNode, "STR_RR2",
  800.         MUIA_String_Reject, "\\\"*?#/'",
  801.     End;
  802.  
  803.     ObjectApp->STR_POP_RR2 = String("", 80);
  804.  
  805.     ObjectApp->POP_RR2 = PopButton(MUII_PopFile);
  806.  
  807.     ObjectApp->POP_RR2 = PopaslObject,
  808.         MUIA_HelpNode, "POP_RR2",
  809.         MUIA_Popasl_Type, 0,
  810.         MUIA_Popstring_String, ObjectApp->STR_POP_RR2,
  811.         MUIA_Popstring_Button, ObjectApp->POP_RR2,
  812.     End;
  813.  
  814.     ObjectApp->CHK_RR3 = CheckMark(FALSE);
  815.  
  816.     ObjectApp->STR_RR3 = StringObject,
  817.         MUIA_Frame, MUIV_Frame_String,
  818.         MUIA_HelpNode, "STR_RR3",
  819.         MUIA_String_Reject, "\\\"*?#/'",
  820.     End;
  821.  
  822.     ObjectApp->STR_POP_RR3 = String("", 80);
  823.  
  824.     ObjectApp->POP_RR3 = PopButton(MUII_PopFile);
  825.  
  826.     ObjectApp->POP_RR3 = PopaslObject,
  827.         MUIA_HelpNode, "POP_RR3",
  828.         MUIA_Popasl_Type, 0,
  829.         MUIA_Popstring_String, ObjectApp->STR_POP_RR3,
  830.         MUIA_Popstring_Button, ObjectApp->POP_RR3,
  831.     End;
  832.  
  833.     ObjectApp->CHK_RR4 = CheckMark(FALSE);
  834.  
  835.     ObjectApp->STR_RR4 = StringObject,
  836.         MUIA_Frame, MUIV_Frame_String,
  837.         MUIA_HelpNode, "STR_RR4",
  838.         MUIA_String_Reject, "\\\"*?#/'",
  839.     End;
  840.  
  841.     ObjectApp->STR_POP_RR4 = String("", 80);
  842.  
  843.     ObjectApp->POP_RR4 = PopButton(MUII_PopFile);
  844.  
  845.     ObjectApp->POP_RR4 = PopaslObject,
  846.         MUIA_HelpNode, "POP_RR4",
  847.         MUIA_Popasl_Type, 0,
  848.         MUIA_Popstring_String, ObjectApp->STR_POP_RR4,
  849.         MUIA_Popstring_Button, ObjectApp->POP_RR4,
  850.     End;
  851.  
  852.     ObjectApp->CHK_RR5 = CheckMark(FALSE);
  853.  
  854.     ObjectApp->STR_RR5 = StringObject,
  855.         MUIA_Frame, MUIV_Frame_String,
  856.         MUIA_HelpNode, "STR_RR5",
  857.         MUIA_String_Reject, "\\\"*?#/'",
  858.     End;
  859.  
  860.     ObjectApp->STR_POP_RR5 = String("", 80);
  861.  
  862.     ObjectApp->POP_RR5 = PopButton(MUII_PopFile);
  863.  
  864.     ObjectApp->POP_RR5 = PopaslObject,
  865.         MUIA_HelpNode, "POP_RR5",
  866.         MUIA_Popasl_Type, 0,
  867.         MUIA_Popstring_String, ObjectApp->STR_POP_RR5,
  868.         MUIA_Popstring_Button, ObjectApp->POP_RR5,
  869.     End;
  870.  
  871.     ObjectApp->CHK_RR6 = CheckMark(FALSE);
  872.  
  873.     ObjectApp->STR_RR6 = StringObject,
  874.         MUIA_Frame, MUIV_Frame_String,
  875.         MUIA_HelpNode, "STR_RR6",
  876.         MUIA_String_Reject, "\\\"*?#/'",
  877.     End;
  878.  
  879.     ObjectApp->STR_POP_RR6 = String("", 80);
  880.  
  881.     ObjectApp->POP_RR6 = PopButton(MUII_PopFile);
  882.  
  883.     ObjectApp->POP_RR6 = PopaslObject,
  884.         MUIA_HelpNode, "POP_RR6",
  885.         MUIA_Popasl_Type, 0,
  886.         MUIA_Popstring_String, ObjectApp->STR_POP_RR6,
  887.         MUIA_Popstring_Button, ObjectApp->POP_RR6,
  888.     End;
  889.  
  890.     ObjectApp->CHK_RR7 = CheckMark(FALSE);
  891.  
  892.     ObjectApp->STR_RR7 = StringObject,
  893.         MUIA_Frame, MUIV_Frame_String,
  894.         MUIA_HelpNode, "STR_RR7",
  895.         MUIA_String_Reject, "\\\"*?#/'",
  896.     End;
  897.  
  898.     ObjectApp->STR_POP_RR7 = String("f", 80);
  899.  
  900.     ObjectApp->POP_RR7 = PopButton(MUII_PopFile);
  901.  
  902.     ObjectApp->POP_RR7 = PopaslObject,
  903.         MUIA_HelpNode, "POP_RR7",
  904.         MUIA_Popasl_Type, 0,
  905.         MUIA_Popstring_String, ObjectApp->STR_POP_RR7,
  906.         MUIA_Popstring_Button, ObjectApp->POP_RR7,
  907.     End;
  908.  
  909.     ObjectApp->CHK_RR8 = CheckMark(FALSE);
  910.  
  911.     ObjectApp->STR_RR8 = StringObject,
  912.         MUIA_Frame, MUIV_Frame_String,
  913.         MUIA_HelpNode, "STR_RR8",
  914.         MUIA_String_Reject, "\\\"*?#/'",
  915.     End;
  916.  
  917.     ObjectApp->STR_POP_RR8 = String("", 80);
  918.  
  919.     ObjectApp->POP_RR8 = PopButton(MUII_PopFile);
  920.  
  921.     ObjectApp->POP_RR8 = PopaslObject,
  922.         MUIA_HelpNode, "POP_RR8",
  923.         MUIA_Popasl_Type, 0,
  924.         MUIA_Popstring_String, ObjectApp->STR_POP_RR8,
  925.         MUIA_Popstring_Button, ObjectApp->POP_RR8,
  926.     End;
  927.  
  928.     ObjectApp->CHK_RR9 = CheckMark(FALSE);
  929.  
  930.     ObjectApp->STR_RR9 = StringObject,
  931.         MUIA_Frame, MUIV_Frame_String,
  932.         MUIA_HelpNode, "STR_RR9",
  933.         MUIA_String_Reject, "\\\"*?#/'",
  934.     End;
  935.  
  936.     ObjectApp->STR_POP_RR9 = String("", 80);
  937.  
  938.     ObjectApp->POP_RR9 = PopButton(MUII_PopFile);
  939.  
  940.     ObjectApp->POP_RR9 = PopaslObject,
  941.         MUIA_HelpNode, "POP_RR9",
  942.         MUIA_Popasl_Type, 0,
  943.         MUIA_Popstring_String, ObjectApp->STR_POP_RR9,
  944.         MUIA_Popstring_Button, ObjectApp->POP_RR9,
  945.     End;
  946.  
  947.     GR_grp_23CC = VirtgroupObject,
  948.         VirtualFrame,
  949.         MUIA_HelpNode, "GR_grp_23CC",
  950.         MUIA_Background, MUII_FILL,
  951.         MUIA_Frame, MUIV_Frame_Text,
  952.         MUIA_Group_Columns, 3,
  953.         Child, LA_label_20CC,
  954.         Child, LA_label_21CC,
  955.         Child, LA_label_22CC,
  956.         Child, ObjectApp->CHK_RR0,
  957.         Child, ObjectApp->STR_RR0,
  958.         Child, ObjectApp->POP_RR0,
  959.         Child, ObjectApp->CHK_RR1,
  960.         Child, ObjectApp->STR_RR1,
  961.         Child, ObjectApp->POP_RR1,
  962.         Child, ObjectApp->CHK_RR2,
  963.         Child, ObjectApp->STR_RR2,
  964.         Child, ObjectApp->POP_RR2,
  965.         Child, ObjectApp->CHK_RR3,
  966.         Child, ObjectApp->STR_RR3,
  967.         Child, ObjectApp->POP_RR3,
  968.         Child, ObjectApp->CHK_RR4,
  969.         Child, ObjectApp->STR_RR4,
  970.         Child, ObjectApp->POP_RR4,
  971.         Child, ObjectApp->CHK_RR5,
  972.         Child, ObjectApp->STR_RR5,
  973.         Child, ObjectApp->POP_RR5,
  974.         Child, ObjectApp->CHK_RR6,
  975.         Child, ObjectApp->STR_RR6,
  976.         Child, ObjectApp->POP_RR6,
  977.         Child, ObjectApp->CHK_RR7,
  978.         Child, ObjectApp->STR_RR7,
  979.         Child, ObjectApp->POP_RR7,
  980.         Child, ObjectApp->CHK_RR8,
  981.         Child, ObjectApp->STR_RR8,
  982.         Child, ObjectApp->POP_RR8,
  983.         Child, ObjectApp->CHK_RR9,
  984.         Child, ObjectApp->STR_RR9,
  985.         Child, ObjectApp->POP_RR9,
  986.     End;
  987.  
  988.     GR_grp_23CC = ScrollgroupObject,
  989.         MUIA_Scrollgroup_Contents, GR_grp_23CC,
  990.         MUIA_Scrollgroup_FreeHoriz, FALSE,
  991.     End;
  992.  
  993.     GR_grp_26 = GroupObject,
  994.         MUIA_HelpNode, "GR_grp_26",
  995.         Child, GR_grp_23CC,
  996.     End;
  997.  
  998.     ObjectApp->GR_grp_13CCCC = RegisterObject,
  999.         MUIA_Register_Titles, ObjectApp->STR_GR_grp_13CCCC,
  1000.         MUIA_HelpNode, "GR_grp_13CCCC",
  1001.         Child, GR_grp_9CCCCCC,
  1002.         Child, GR_grp_9CCCCCCCC,
  1003.         Child, GR_grp_24,
  1004.         Child, GR_grp_26,
  1005.     End;
  1006.  
  1007.     ObjectApp->BT_ConfGravar = SimpleButton(FraGravar);
  1008.  
  1009.     ObjectApp->BT_ConfUsar = SimpleButton(FraUsar);
  1010.  
  1011.     ObjectApp->BT_ConfCancelar = SimpleButton(FraCancelar);
  1012.  
  1013.     GR_grp_16 = GroupObject,
  1014.         MUIA_HelpNode, "GR_grp_16",
  1015.         MUIA_Group_Horiz, TRUE,
  1016.         Child, ObjectApp->BT_ConfGravar,
  1017.         Child, ObjectApp->BT_ConfUsar,
  1018.         Child, ObjectApp->BT_ConfCancelar,
  1019.     End;
  1020.  
  1021.     GR_grp_15 = GroupObject,
  1022.         MUIA_HelpNode, "GR_grp_15",
  1023.         Child, ObjectApp->GR_grp_13CCCC,
  1024.         Child, GR_grp_16,
  1025.     End;
  1026.  
  1027.     GROUP_ROOT_1 = GroupObject,
  1028.         Child, GR_grp_15,
  1029.     End;
  1030.  
  1031.     ObjectApp->Janela_Config = WindowObject,
  1032.         MUIA_Window_Title, FraZeladorConfig,
  1033.         MUIA_Window_ID, MAKE_ID('1', 'W', 'I', 'N'),
  1034.         MUIA_Window_NoMenus, TRUE,
  1035.         WindowContents, GROUP_ROOT_1,
  1036.     End;
  1037.  
  1038.     ObjectApp->App = ApplicationObject,
  1039.         MUIA_Application_Author, "Daniel Mealha Cabrita",
  1040.         MUIA_Application_Base, "ZeladorBase",
  1041.         MUIA_Application_Title, "Zelador",
  1042.         MUIA_Application_Version, "$VER: Zelador 1.22 (15.08.1999)",
  1043.         MUIA_Application_Copyright, "Daniel Mealha Cabrita",
  1044.         SubWindow, ObjectApp->Janela_Principal,
  1045.         SubWindow, ObjectApp->Janela_Config,
  1046.     End;
  1047.  
  1048.  
  1049.     if (!ObjectApp->App)
  1050.     {
  1051.         FreeVec(ObjectApp);
  1052.         return(NULL);
  1053.     }
  1054.  
  1055.     DoMethod(ObjectApp->MN_Config,
  1056.         MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
  1057.         ObjectApp->Janela_Config,
  1058.         3,
  1059.         MUIM_Set, MUIA_Window_Open, TRUE
  1060.         );
  1061.  
  1062.     DoMethod(ObjectApp->MN_Sobre,
  1063.         MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
  1064.         ObjectApp->App,
  1065.         2,
  1066.         MUIM_Application_ReturnID, AboutPedido
  1067.         );
  1068.  
  1069.     DoMethod(ObjectApp->MN_Sair,
  1070.         MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
  1071.         ObjectApp->App,
  1072.         2,
  1073.         MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit
  1074.         );
  1075.  
  1076.     DoMethod(ObjectApp->MN_EFR,
  1077.         MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
  1078.         ObjectApp->App,
  1079.         2,
  1080.         MUIM_Application_ReturnID, Processar_EFR
  1081.         );
  1082.  
  1083.     DoMethod(ObjectApp->MN_RR,
  1084.         MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
  1085.         ObjectApp->App,
  1086.         2,
  1087.         MUIM_Application_ReturnID, Processar_RR
  1088.         );
  1089.  
  1090.     DoMethod(ObjectApp->Janela_Principal,
  1091.         MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
  1092.         ObjectApp->App,
  1093.         2,
  1094.         MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit
  1095.         );
  1096.  
  1097.     DoMethod(ObjectApp->BT_FazerEvento,
  1098.         MUIM_Notify, MUIA_Pressed, FALSE,
  1099.         ObjectApp->Janela_Config,
  1100.         3,
  1101.         MUIM_Set, MUIA_Window_Open, FALSE
  1102.         );
  1103.  
  1104.     DoMethod(ObjectApp->BT_FazerEvento,
  1105.         MUIM_Notify, MUIA_Pressed, FALSE,
  1106.         ObjectApp->App,
  1107.         2,
  1108.         MUIM_Application_ReturnID, FazerEventoAgora
  1109.         );
  1110.  
  1111.     DoMethod(ObjectApp->BT_Config,
  1112.         MUIM_Notify, MUIA_Pressed, FALSE,
  1113.         ObjectApp->Janela_Config,
  1114.         3,
  1115.         MUIM_Set, MUIA_Window_Open, TRUE
  1116.         );
  1117.  
  1118.     DoMethod(ObjectApp->Janela_Principal,
  1119.         MUIM_Window_SetCycleChain, ObjectApp->CHK_EventosAtivos,
  1120.         ObjectApp->BT_FazerEvento,
  1121.         ObjectApp->BT_Config,
  1122.         0
  1123.         );
  1124.  
  1125.     DoMethod(ObjectApp->Janela_Config,
  1126.         MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
  1127.         ObjectApp->Janela_Config,
  1128.         3,
  1129.         MUIM_Set, MUIA_Window_Open, FALSE
  1130.         );
  1131.  
  1132.     DoMethod(ObjectApp->STR_Path1,
  1133.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1134.         ObjectApp->Janela_Config,
  1135.         3,
  1136.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_Path2
  1137.         );
  1138.  
  1139.     DoMethod(ObjectApp->STR_Path2,
  1140.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1141.         ObjectApp->Janela_Config,
  1142.         3,
  1143.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_Path3
  1144.         );
  1145.  
  1146.     DoMethod(ObjectApp->STR_Path3,
  1147.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1148.         ObjectApp->Janela_Config,
  1149.         3,
  1150.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_Path1
  1151.         );
  1152.  
  1153.     DoMethod(ObjectApp->STR_LimiteHoras,
  1154.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1155.         ObjectApp->Janela_Config,
  1156.         3,
  1157.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_InicioEvento
  1158.         );
  1159.  
  1160.     DoMethod(ObjectApp->STR_InicioEvento,
  1161.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1162.         ObjectApp->Janela_Config,
  1163.         3,
  1164.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_TentarAte
  1165.         );
  1166.  
  1167.     DoMethod(ObjectApp->STR_TentarAte,
  1168.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1169.         ObjectApp->Janela_Config,
  1170.         3,
  1171.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_LimiteHoras
  1172.         );
  1173.  
  1174.     DoMethod(ObjectApp->STR_AssuntoIntercepta,
  1175.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1176.         ObjectApp->Janela_Config,
  1177.         3,
  1178.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_MaxPedidoKbEvento
  1179.         );
  1180.  
  1181.     DoMethod(ObjectApp->STR_MaxPedidoKbEvento,
  1182.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1183.         ObjectApp->Janela_Config,
  1184.         3,
  1185.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_RecusaAPartirKB
  1186.         );
  1187.  
  1188.     DoMethod(ObjectApp->STR_RecusaAPartirKB,
  1189.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1190.         ObjectApp->Janela_Config,
  1191.         3,
  1192.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_MaxDaysValidID
  1193.         );
  1194.  
  1195.     DoMethod(ObjectApp->STR_MaxDaysValidID,
  1196.         MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
  1197.         ObjectApp->Janela_Config,
  1198.         3,
  1199.         MUIM_Set, MUIA_Window_ActiveObject, ObjectApp->STR_AssuntoIntercepta
  1200.         );
  1201.  
  1202.     DoMethod(ObjectApp->BT_ConfGravar,
  1203.         MUIM_Notify, MUIA_Pressed, FALSE,
  1204.         ObjectApp->App,
  1205.         2,
  1206.         MUIM_Application_ReturnID, ConfGravar
  1207.         );
  1208.  
  1209.     DoMethod(ObjectApp->BT_ConfGravar,
  1210.         MUIM_Notify, MUIA_Pressed, FALSE,
  1211.         ObjectApp->Janela_Config,
  1212.         3,
  1213.         MUIM_Set, MUIA_Window_Open, FALSE
  1214.         );
  1215.  
  1216.     DoMethod(ObjectApp->BT_ConfUsar,
  1217.         MUIM_Notify, MUIA_Pressed, FALSE,
  1218.         ObjectApp->App,
  1219.         2,
  1220.         MUIM_Application_ReturnID, ConfUsar
  1221.         );
  1222.  
  1223.     DoMethod(ObjectApp->BT_ConfUsar,
  1224.         MUIM_Notify, MUIA_Pressed, FALSE,
  1225.         ObjectApp->Janela_Config,
  1226.         3,
  1227.         MUIM_Set, MUIA_Window_Open, FALSE
  1228.         );
  1229.  
  1230.     DoMethod(ObjectApp->BT_ConfCancelar,
  1231.         MUIM_Notify, MUIA_Pressed, FALSE,
  1232.         ObjectApp->App,
  1233.         2,
  1234.         MUIM_Application_ReturnID, ConfCancelar
  1235.         );
  1236.  
  1237.     DoMethod(ObjectApp->BT_ConfCancelar,
  1238.         MUIM_Notify, MUIA_Pressed, FALSE,
  1239.         ObjectApp->Janela_Config,
  1240.         3,
  1241.         MUIM_Set, MUIA_Window_Open, FALSE
  1242.         );
  1243.  
  1244.     DoMethod(ObjectApp->Janela_Config,
  1245.         MUIM_Window_SetCycleChain, ObjectApp->GR_grp_13CCCC,
  1246.         ObjectApp->CHK_AutoMiami,
  1247.         ObjectApp->CHK_ReceberYAM,
  1248.         ObjectApp->CHK_EnviarYAM,
  1249.         ObjectApp->CHK_FileRequest,
  1250.         ObjectApp->CHK_EFRScanWhileConnected,
  1251.         ObjectApp->CHK_HabilitaRobotReply,
  1252.         ObjectApp->CHK_RRScanWhileConnected,
  1253.         ObjectApp->CHK_Ativo1,
  1254.         ObjectApp->STR_Path1,
  1255.         ObjectApp->CHK_Espera1,
  1256.         ObjectApp->CHK_Ativo2,
  1257.         ObjectApp->STR_Path2,
  1258.         ObjectApp->CHK_Espera2,
  1259.         ObjectApp->CHK_Ativo3,
  1260.         ObjectApp->STR_Path3,
  1261.         ObjectApp->CHK_Espera3,
  1262.         ObjectApp->CYC_DuracTempo,
  1263.         ObjectApp->STR_LimiteHoras,
  1264.         ObjectApp->STR_InicioEvento,
  1265.         ObjectApp->STR_TentarAte,
  1266.         ObjectApp->STR_AssuntoIntercepta,
  1267.         ObjectApp->POP_TxtApresentacao,
  1268.         ObjectApp->POP_EnviandoArq,
  1269.         ObjectApp->STR_MaxPedidoKbEvento,
  1270.         ObjectApp->STR_RecusaAPartirKB,
  1271.         ObjectApp->STR_MaxDaysValidID,
  1272.         ObjectApp->CHK_Req0,
  1273.         ObjectApp->STR_Req0,
  1274.         ObjectApp->POP_Req0,
  1275.         ObjectApp->CHK_Req1,
  1276.         ObjectApp->STR_Req1,
  1277.         ObjectApp->POP_Req1,
  1278.         ObjectApp->CHK_Req2,
  1279.         ObjectApp->STR_Req2,
  1280.         ObjectApp->POP_Req2,
  1281.         ObjectApp->CHK_Req3,
  1282.         ObjectApp->STR_Req3,
  1283.         ObjectApp->POP_Req3,
  1284.         ObjectApp->CHK_Req4,
  1285.         ObjectApp->STR_Req4,
  1286.         ObjectApp->POP_Req4,
  1287.         ObjectApp->CHK_Req5,
  1288.         ObjectApp->STR_Req5,
  1289.         ObjectApp->POP_Req5,
  1290.         ObjectApp->CHK_Req6,
  1291.         ObjectApp->STR_Req6,
  1292.         ObjectApp->POP_Req6,
  1293.         ObjectApp->CHK_Req7,
  1294.         ObjectApp->STR_Req7,
  1295.         ObjectApp->POP_Req7,
  1296.         ObjectApp->CHK_Req8,
  1297.         ObjectApp->STR_Req8,
  1298.         ObjectApp->POP_Req8,
  1299.         ObjectApp->CHK_Req9,
  1300.         ObjectApp->STR_Req9,
  1301.         ObjectApp->POP_Req9,
  1302.         ObjectApp->CHK_RR0,
  1303.         ObjectApp->STR_RR0,
  1304.         ObjectApp->POP_RR0,
  1305.         ObjectApp->CHK_RR1,
  1306.         ObjectApp->STR_RR1,
  1307.         ObjectApp->POP_RR1,
  1308.         ObjectApp->CHK_RR2,
  1309.         ObjectApp->STR_RR2,
  1310.         ObjectApp->POP_RR2,
  1311.         ObjectApp->CHK_RR3,
  1312.         ObjectApp->STR_RR3,
  1313.         ObjectApp->POP_RR3,
  1314.         ObjectApp->CHK_RR4,
  1315.         ObjectApp->STR_RR4,
  1316.         ObjectApp->POP_RR4,
  1317.         ObjectApp->CHK_RR5,
  1318.         ObjectApp->STR_RR5,
  1319.         ObjectApp->POP_RR5,
  1320.         ObjectApp->CHK_RR6,
  1321.         ObjectApp->STR_RR6,
  1322.         ObjectApp->POP_RR6,
  1323.         ObjectApp->CHK_RR7,
  1324.         ObjectApp->STR_RR7,
  1325.         ObjectApp->POP_RR7,
  1326.         ObjectApp->CHK_RR8,
  1327.         ObjectApp->STR_RR8,
  1328.         ObjectApp->POP_RR8,
  1329.         ObjectApp->CHK_RR9,
  1330.         ObjectApp->STR_RR9,
  1331.         ObjectApp->POP_RR9,
  1332.         ObjectApp->BT_ConfGravar,
  1333.         ObjectApp->BT_ConfUsar,
  1334.         ObjectApp->BT_ConfCancelar,
  1335.         0
  1336.         );
  1337.  
  1338.     set(ObjectApp->Janela_Principal,
  1339.         MUIA_Window_Open, TRUE
  1340.         );
  1341.  
  1342.  
  1343.     return(ObjectApp);
  1344. }
  1345.  
  1346. void DisposeApp(struct ObjApp * ObjectApp)
  1347. {
  1348.     MUI_DisposeObject(ObjectApp->App);
  1349.     FreeVec(ObjectApp);
  1350. }
  1351.